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A3STRACT 
Two  versions  of  an  analog  display  program  have  been  assembled  for 
the  analog  display  of  digitally  derived  graph  plot  information.   Input  to 
the  analog  display  system  is  the  magnetic  tape  output  by  the  "DRAW"  sub- 
routine used  at  the  U.  S.  Naval  Postgraduate  School  Computer  Facility. 
The  fast  version  of  the  program,  driving  an  oscilloscope  as  the  display  ele- 
ment, provides  a  clear  and  accurate  display  of  the  graph  points,  but  is  of 
limited  usefulness  due  to  the  small  size  of  the  standard  scope  face  and 
the  flicker  in  the  presentation.   The  slow  version,  employing  an  x-y  plot- 
ter as  the  display  element,  also  yields  an  adequate  display,  and  at  a 
slightly  faster  rate  than  the  existing  digital  plotter  currently  used  by 
the  Computer  Facility  for  graphical  output.  A  linear  interpolation  routine 
has  been  implemented  in  the  slow  version,  so  that  plotter  response  is  not 
affected  by  coarseness  in  the  data  points. 
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1.    Introduction. 

With  the  increasing  use  of  the  CDC  1604  computer  at  the  Naval  Post- 
graduate School,  the  time  required  for  the  printing  of  graph  plot  out- 
put by  the  present  off-line  system  has  become  an  item  for  concern.   The 
time  required  for  the  present  equipment  combination  (CDC  160,  CDC  163, 
and  CAL-COMP  digital  plotter)  to  complete  one  graph  is  usually  two  to 
three  minutes,  thereby  limiting  the  system's  output  to  approximately  20 
graphs  per  hour.   By  assuming  that  six  hours  of  CDC  160  time  is  avail- 
able for  graph  plotting,  and  that  the  average  user  requests  three  graphs, 
the  conclusion  is  reached  that  40  users  could  saturate  the  capability  of 
the  existing  system.   These  figures  point  to  the  desirability  of  develop- 
ing a  faster  graph  plotting  system. 

1.1  Project  deiinition. 

This  project  was  undertaken  to  investigate  the  feasibility  of 
off-line  analog  display  of  graph  plot  information,  with  the  major  emphasis 
on  the  associated  CDC  160  programming  effort.  More  specifically,  the 
objective  was  to  generate  the  CDC  160  programming  necessary  to  display 
the  digital  graph  data  on  a  cathode  ray  tube  device  for  direct  viewing 
or  photo-copying. 

1.2  Basic  assumptions. 

The  analog  display  program  was  written  within  the  framework  of 
the  following  assumptions: 

a.  The  only  equipment  available  to  the  project  was  that 
already  present  at  the  Naval  Postgraduate  School. 

b.  The  specially  prepared  magnetic  tape  generated  by  the 
"DRAW"  subroutine  was  to  be  used  as  the  input  to  the  analog  display  system. 
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c.  The  number  of  cells  needed  for  the  CDC  160  program 
should  be  as  few  as  possible  in  order  to  leave  maximum  room  for  graph 
plot  information  in  the  computer's  memory.   As  a  goal,  one-quarter  of  the 
memory  was  allocated  to  the  program. 

d.  Refinements,  such  as  curve  and  ordinate  labelling, 
and  variable  character  sizes  were  considered  unessential  to  the  project. 

1.3  The  analog  display  system. 

A  block  diagram  of  the  analog  display  system  is  shown  in  figure 
1.   The  tasks  assigned  to  the  various  elements  of  the  system  are  as  in- 
dicated below: 

a.  The  CDC  163  magnetic  tape  unit  provides  the  input 
data  to  the  CDC  160  digital  computer  from  a  specially  prepared  magnetic 
tape.   Data  format  for  the  tape  is  described  in  Appendix  1. 

b.  The  CDC  160  digital  computer  reads  the  graph  plot  data 
from  the  magnetic  tape  as  needed,  transforms  and  stores  this  data  in  the 
format  required  by  the  digital  to  analog  (D/A)  conversion  equipment,  and 
then  outputs  this  transformed  data  to  the  conversion  equipment  in  the 
sequence  required  for  a  meaningful  presentation. 

c.  The  digital  to  analog  (D/A)  conversion  equipment  converts 
each  twelve  bit  word  output  by  the  computer  into  an  analog  voltage. 

d.  The  display  element  provides  a  visible  trace  of  the 
analog  voltages  output  by  the  D/A  conversion  equipment. 


2,        Computer  programming, 

The  digital  computer  tasks  were  divided  into  separate  routines  as 
listed  in  figure  2.  All  of  these  routines  were  written  in  relocatable 
form  except  as  noted. 

2.1  ZEST  routine. 

Operation  of  the  analog  display  system  program  is  controlled  by 
this  routine.   The  list  of  acceptable  starting  addresses  and  their  func- 
t ions  is  given  in  figure  3.   The  routine  exists  to  the  routine  labelled 
"ROT". 

2.2  ROT  routine. 

This  routine  controls  the  display  sequencing  of  titles,  origin9 
and  graph  points  by  employing  subroutines  and  simple  parameter  manipula- 
tions.  The  routine  is  an  endless  loop  and  will  continue  to  cause  the  dis- 
play of  graph  plot  information  in  the  absence  of  operator  interruption 
or  equipment  malfunction. 

2.3  READ  subroutine. 

The  main  elements  in  the  operation  of  the  READ  subroutine  are 
listed  below:   (fixed  location  -  1530-1741)  . 

a.  Read  and  store  the  number  of  title  lines. 

b.  Clear  title  memory  space  to  permit  the  subsequent 
search  for  the  last  character  of  a  title  line. 

c.  Read  and  store  one  title  line, 

d.  Find  the  address  of  the  last  BCD  character  in  the  title 
line  that  is  not  a  space  or  00  code. 

e.  Add  the  title  line  end  code  (77)  as  the  last  character 
of  the  title  line. 

f.  Pack  the  title  line  into  the  memory  files  two  BCD  charac' 
ters  per  computer  word. 


g.   Index  the  file  pointing  cells. 

h.   Return  to  item  b.  for  next  title  line.   Continue 
if  no  title  lines  remain  to  be  processed. 

i.   Read  the  location  of  the  origin  of  the  graph  plot, 
transform  this  location  to  the  form  required  for  display,  and  store  in 
computer  memory. 

2.4  GREAD  subroutine. 

The  reading  and  transformation  of  the  graph  points  generated 
by  the  "DRAW"  routine  is  controlled  by  the  GREAD  subroutine.  The  main 
elements  are  described  below: 

a.  Store  the  number  of  curves  to  be  displayed  and  set  the 
file  pointing  cells. 

b.  Transform  (i.e.  relocate  the  origin  and  change  the 
scale  of)  the  graph  points  to  a  form  suitable  for  display.   The  required 
transformation  is  described  in  Appendix  II. 

c.  Index  the  file  pointing  cells. 

d.  Return  to  item  b.   for  next  curve.   Continue  if  all 
curves  have  been  processed. 

e.  If  the  number  of  graph  points  exceeds  the  available 
memory  space,  GREAD  will  reduce  the  number  of  curves  requested  by  one, 
reset  the  magnetic  tape  to  restart  the  current  graph  plot  and  halt  in  0007. 
Run  to  continue. 

2.5  TAP  subroutine. 

The  Tap  subroutine  is  a  general -purpose  read/write  routine  for 
the  control  of  the  CDC  163  magnetic  tape  unit. 

2.6  LTR  subroutine. 
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This  routine  outputs  the  necessary  computer  instructions  to  the 
D/A  conversion  equipment  to  form  the  analog  representations  of  the  BCD 
characters  stored  in  memory.   Each  letter  is  drawn  by  forming  a  series  of 
closely  spaced  voltages  so  that  a  nearly  continuous  series  of  dots  is 
displayed  on  the  oscilloscope.   Individual  movement  codes  for  character 
generation  are  recovered  from  the  character  table  by  employment  of  the 
RNC  subroutine.   The  LTR  subroutine  is  divided  into  the  sections  described 
below: 

a.  Output  the  first  point  of  the  line  in  the  pen  up  mode. 

b.  Pickup  the  BCD  character  from  memory.   If  an  end  of  line 
code  (77)  is  detected,  go  to  item  g. 

c.  Consult  the  character  table  to  determine  the  location 
of  the  appropriate  movement  codes. 

d.  Pickup  the  movement  code  from  memory  and  decode  it  for 
pen  control,  direction,  number  of  steps,  and  step  size  information.   Each 
movement  code  contains  horizontal  or  vertical  information  only.   If  an 
end  of  letter  code  (77)  is  detected,  go  to  item  b. 

e.  Output  motion  in  one  direction. 

f .  Set  arguments  for  motion  in  the  other  direction  and 
return  to  item  d. 

g.  Line  complete;  exit. 
2.7  RNC  subroutine. 

The  RNC  routine  reads  six  bit  bytes  from  a  file  of  two  six  bit 
words  per  computer  word  into  the  arithmetic  register.   File  tracking  is 
performed  by  a  file  pointer  and  a  half-word  pointer  set  in  low  core  memory. 


2.8  Character  table. 

The  first  portion  of  the  Character  table  (cells  1000-1077) 
contains  the  memory  location  of  the  initial  movement  codes  for  a  specified 
BCD  character. 

The  second  portion  (cells  1100-1527)  contlns  the  movement  codes 
used  by  the  LTR  subroutine  in  generating  the  characters  of  the  title  line. 
Each  -lovement  code  is  a  six  bit  word  which  contains  information  for  hori- 
zontal or  vertical  motion  only.   The  four  least  significant  bits  of  the 
movement  code  contain  the  number  of  required  steps  in  one  direction,  the 
most  significant  bit  sets  the  direction  in  a  positive  or  negative  sense, 
and  the  remaining  bit  sets  the  step  size.   Special  movement  codes  are 
octal  77,  76,  and  75.   These  codes  indicate  the  end  of  a  character,  set 
the  pen  up  (blank),  and  set  the  pen  down  (unblank)  respectively.   The 
horizontal  and  vertical  movement  codes  alternate  in  the  table  and  the 
first  code  in  the  table  (and  the  first  code  after  a  special  code)  is  a 
horizontal  movement  code. 

2.9  GRP  subroutine. 

This  routine  takes  the  contents  of  the  specially  prepared  graph 
point  file  in  the  computer  memory  and  provides  the  necessary  output  instruc^ 
tions  to  cause  the  D/A  conversion  equipment  to  output  corresponding  volt- 
ages for  display.   The  graph  point  file  has  a  24  bit  word  length;  the  most 
significant  12  bits  indicating  the  horizontal  ordinate  and  the  least  signi- 
ficant 12  bits  (in  the  computer  word)  indicating  the  vertical  ordinate  of 
the  graph  point.   The  file  beginning  and  file  end  memory  locations  and  a 
file  pointing  cell  are  set  in  low  core  memory. 


2.10  DA  and  LDA  subroutines. 

These  delay  subroutines  are  used  to  slow  the  computation  to 
match  the  characteristics  of  an  x-y  plotter  display  element.   The  DA 
routine  counts  to  octal  1000  to  generate  a  delay  of  approximately  6.5 
milliseconds.   The  LDA  routine  repeats  the  DA  routine  N  times,  where  N  is 
the  entry  argument. 
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3.   Discussion  of  results. 

Two  versions  of  the  analog  display  program  have  been  written;  a 
fast  version  which  uses  an  oscilloscope  as  the  display  element;  and  a 
slow  version  for  use  with  an  x-y  plotter.   The  slow  version  is  essentially 
a  delayed  version  of  the  fast  program  with  other  variations  for  more  re- 
fined pen  control  and  sequencing  needed  when  printing  a  continuous  hard 
copy.   Both  versions  occupy  approximately  one-quarter  of  the  computer 
memory. 

3.1  Fast  version  with  oscilloscope  display  element. 

The  graph  plot  display  provided  by  the  oscilloscope  was  clear 
and  accurate,  but  testing  has  shown  that  the  fast  program  for  direct 
viewing  of  the  scope  is  not  fast  enough  to  prevent  flicker.   Flicker  is 
particularly  noticeable  in  the  title  line  display,  and  to  a  reduced  de- 
gree in  the  graph  point  display.   Approximately  six  characters  or  400 
graph  points  can  be  displayed  without  the  appearance  of  flicker,  but  since 
a  normal  title  contains  approximately  90  characters,  a  twenty  to  one  im- 
provement in  cycle  time  is  needed.   This  improvement  is  unattainable 
without  a  change  in  equipment;  a  computer  with  a  faster  memory  or  a  larger 
memory,  or  both.   A  trade  off  is  possible  between  the  speed  of  operation 
and  computer  memory  space,  but  the  needed  improvement  is  beyond  the  capa- 
bilities of  the  computer  used.   Some  improvement  could  be  made  in  dis- 
play quality  by  employing  an  oscilloscope  with  a  long  persistence  phos- 
phor on  the  screen  of  the  cathode  ray  tube.   A  memc scope  was  tried  as  the 
display  element,  but  the  particular  model  used  was  unsatisfactory  due  to 
lack  of  resolution  and  inadequate  horizontal  gain.   Another  approach  would 
be  to  use  coded  titles,  thus  decreasing  the  time  required  for  title  dis- 
play. 
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Since  the  oscilloscope  displays  a  series  of  dots  corresponding 
to  the  discrete  voltages  output  by  the  D/A  conversion  equipment  rather 
than  a  continuous  line,  some  provision  must  be  made  for  the  blanking  of 
the  unwanted  dots  as  the  trace  moves  from  graph  point  to  graph  point. 
Two  steps  are  needed  in  moving  from  one  point  (xO,  yO)  to  the  next  point 
(xl,  yl)  not  on  a  horizontal  or  vertical  line  from  the  first  point. 
Motion  is  output  first  in  the  horizontal  direction  to  a  temporary  point 
(xl,  yO)  followed  by  a  vertical  move  to  the  desired  point  (xl,  yl) .   It 
is  the  intermediate  point  that  must  be  blanked  to  provide  an  uncluttered 
display.   A  similar  situation  requiring  blanking  exists  in  the  spacing 
between  letters  in  the  title  lines.   The  necessary  blanking  is  attained 
by  employment  of  the  "AND"  gate  described  in  Appendix  II,  and  shown  in 
figure  5. 

The  effective  viewing  area  of  the  standard  oscilloscope  cathode 
ray  tube  is  a  square  of  approximately  three  inches  on  a  side.   This  is  not 
adequate  for  the  display  of  readable  titling  together  with  a  graph  of 
acceptable  size.   A  large  DuMont  slave  oscillograph  was  considered,  but 
it  lacked  the  requisite  frequency  response  for  suitable  display  character- 
istics. 

For  direct  viewing,  no  provision  is  made  for  the  retention  of 
the  scale  grid  in  the  display  of  the  second  and  subsequent  curves  of  a 
multi-curve  graph.   Since  the  "DRAW"  routine  treats  the  scale  grid  simply 
as  two  separate  curves,  the  simplest  solution  for  retention  of  the  scale 
grid  would  be  to: 

a.  Revise  the  "DRAW"  routine  to  make  the  scale  grid  the 
first  and  second  curves  on  the  tape  vice  the  second  and  third  curves  as 
in  the  existing  routine,  and 
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b.  Make  a  simple  modification  to  the  analog  display 
program  to  retain  and  display  the  first  and  second  curves  in  the  file 
plus  display  any  number  of  following  curves  as  desired. 

Polaroid  photography  yields  a  picture  of  an  8  by  10  centimeter 
rectangle  of  the  scope  face  at  approximately  90  percent  actual  size. 
The  hard  copy  enables  the  size  of  the  graph  relative  to  the  titling  to 
be  greater  than  that  needed  for  direct  viewing  due  to  greater  ease  in 
recognition  of  the  title  characters.  The  cost  of  the  photographs  is  ex- 
cessive, however,  at  approximately  30  cents  per  copy. 

Complicated  and  densely  packed  curves  are  not  acceptable  for 
oscilloscope  display  due  to  the  lack  of  curve  labelling  and  the  relatively 
low  resolution  coupled  with  the  small  size  of  the  scope  face. 
3.2  Slow  version  with  x-y  plotter  display  element. 

The  slow  version  of  the  analog  display  program  was  originally 
assembled  as  a  test  instrument  for  determining  the  adequacy  of  the 
character  display  section  of  the  fast  version.  By  introducing  delays  at 
appropriate  points  in  the  program,  the  operation  was  slowed  down  suffie 
ciently  to  drive  an  x-y  plotter,  providing  a  hard  copy  of  all  tested 
characters.   Results  on  character  readibility  were  very  good  since  the 
magnitude  of  the  output  steps  was  small  enough  and  the  timing  slow  enough 
for  the  plotter  to  follow  without  overshoot  or  round-off  of  the  corners. 

The  success  with  the  x-y  plotter  display  of  characters  led  to  an 
attempt  at  a  delayed  curve  point  plotting  routine.   Results  again  were  very 
good  provided  that  the  spacing  between  sequential  curve  points  was  not  so 
large  as  to  cause  plotter  overshoot.   Any  attempt  to  display  coarse  curve 
point  data  (eg.  the  scale  grids)  on  the  x-y  plotter  indicated  the  need  for 
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interpolation  between  points,  either  before  the  data  is  placed  in  the 
memory  file,  or  as  the  file  is  output  to  the  conversion  equipment. 

A  curve  plotting  routine  incorporating  linear  interpolation  be- 
tween curve  points  was  written  using  the  algorithm  of  program  LINE  in 
reference  [2].   The  interpolation  occurs  as  the  point  file  is  output  to 
the  D/A  conversion  equipment,  but  synthetic  delays  are  still  required  in 
the  computer  to  match  the  plotter  characteristics. 

A  complete  slow  version  of  the  analog  display  program  was 
eventually  assembled  that  would  provide  a  hard  copy  of  an  entire  graph  on 
the  x-y  plotter.   Pen  control  and  curve  definition  was  clear  and  accurate 
provided  that  the  synthetic  delays  were  adjusted  to  allow  for  plotter  re- 
sponse.  The  size  of  the  graphs  could  be  adjusted  up  to  maximum  paper  size, 
but  with  some  change  in  the  timing  delays  which  are  moderately  sensitive 
to  plotter  scale  changes.   Preliminary  tests  have  shown  that  the  analog 
display  program  using  the  x-y  plotter  as  the  display  element  is  just  as 
fast  (on  a.  unit  graph  basis)  as  the  existing  digital  equipment. 

The  revised  sequencing  of  the  slow  version  brings  only  one  curve 
into  the  computer  memory  file  at  a  time,  so  that  approximately  one-quarter 
of  the  memory  is  unused,  and  may  be  employed  to  add  refinements  to  the 
display  program  as  desired. 
3 . 3  Summary . 

A  fast  version  of  an  analog  display  program  has  been  assembled 
for  the  use  with  an  oscilloscope  as  the  display  element.   The  display  is 
clear  and  accurate,  but  is  hampered  by  the  small  size  of  the  scope  face 
and  by  the  flicker  in  the  presentation.   The  flicker  problem  cannot  be 
overcome  using  present  equipment. 
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A  slow  version  of  the  display  program  with  an  x-y  plotter  as 
the  display  clement  is  slightly  faster  than  the  existing  digital  plotter 
on  a  unit  graph  basis.   An  interpolation  routine  has  been  implemented  for 
point  plotting  so  that  coarse  input  data  provides  a  continuous  trace  with- 
out plotter  overshoot  or  corner  round-off. 


12 


BIBLIOGRAPHY 


1.  Control  Data  Corporation,  Control  Data  160  Computer  Programming 
Manual . 

2.  Hogg,  R.  L.  ,  and  Glover,  D.  C,  Control  System  Programming,  Remote 
Computing  and  Data  Display.   MS  Thesis,  USNPGS,  1963. 


13 


APPENDIX  I 
MAGNETIC  TAPE  DATA  FORMAT 
The  magnetic  tape  generated  by  the  "DRAW"  routine  and  used  for  input 
to  the  analog  display  system  program  is  constructed  according  to  the  for- 
mat described  below. 

A.  Titling  data  (multiple  records). 

1.  First  record 

a.  12  bit  binary  mode. 

b.  Length  -  four  CDC  160  words. 

c.  Word  three  contains  an  octal  integer  indicating 
the  number  of  title  lines.   The  remaining  words  are  not  used  by  the  analog 
display  program. 

2.  Subsequent  records. 

a.  BCD  characters  in  six  bit  binary  mode. 

b.  Length  -  120  characters;  the  first  character  is 
not  used  by  the  analog  display  program. 

B.  Axes  data   (single  record). 

1.  12  bit  binary  mode. 

2.  Length  -  20  CDC  1&0  words. 

3.  The  second  and  eleventh  words  indicate  the  position  of 
the  graph  origin  in  hundredths  of  an  inch  from  the  reference  position. 
The  remaining  words  are  not  used  by  the  analog  display  program.   The 
reference  position  is  the  starting  point  for  all  dimensions  output  by 
the  "DRAW"  routine. 

C.  Curve  point  data   (multiple  records). 

1.   12  bit  binary  mode. 
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2.  Length  -  3677  (octal)  CDC  160  words. 

3.  Horizontal  and  vertical  ordinates  alternate:   both 
being  measured  in  hundredths  of  an  inch  from  the  reference  position. 

4.  The  first  four  and  the  last  three  words  are  not  used 
by  the  analog  display  program. 

5.  Two  end  flags  of  octal  3777  follow  useful  curve  data, 
D.   End  of  file  mark. 

An  end  of  file  mark  indicates  the  end  of  one  complete  set 
of  graph  plot  data. 

A  complete  description  of  the  magnetic  tape  data  format  is  available 
in  Reference  [2] . 
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APPENDIX  II 
DIGITAL  TO  ANALOG  EQUIPMENT  CHARACTERISTICS 
AND  GRAPH  POINT  TRANSFORMATION  SCHEME 

A.  The  digital  to  analog  (D/A)  conversion  equipment  located  in  the 
computer  laboratory  has  two  channels  for  digital  to  analog  conversion, 
each  of  which  converts  a  twelve  bit  word  output  by  the  digital  computer 
into  a  voltage  in  the  range  zero  to  minus  ten  volts.   The  corresponding 
bit  patterns  and  output  voltages  are  given  in  figure  4.  The  external 
function  code  for  digital  to  analog  conversion  is  2.4XY  octal,  where  Y 
indicates  the  desired  channel  and  X  controls  operation  of  an  "AND"  gate 
that  may  be  used  directly  or  through  a  connected  relay  to  blank  the  scope 
trace  or  lift  the  recorder  pen.   Each  conversion  takes  approximately  20 
microseconds  (conversion  equipment  time  only)  and  is  accurate  to  approxi- 
mately 10  millivolts. 

B.  A  graph  point  transformation  is  required  for  a  properly  scaled 
and  oriented  display.   The  magnetic  tape  output  of  the  "DRAW"  routine 
contains  curve  data  which  is  based  on  a  reference  point  in  the  lower 
left  hand  corner  of  the  plot.   Curve  points  are  given  in  hundredths  of  an 
inch  from  this  reference  point  and  are  positive  octal  numbers  since  up 
and  right  are  taken  as  the  positive  directions.  Maximum  acceptable 
dimensions  for  the  graph  plot  generated  by  the  "DRAW"  routine  are  10 
inches  in  width  by  15  inches  in  length. 

The  digital  to  analog  conversion  table  (Figure  4),  shows  that 
as  the  octal  input  to  the  D/A  conversion  equipment  increases,  the  voltage 
output  by  the  equipment  decreases.   Normal  display  devices  are  oriented  so 
that  positive  inputs  yield  positive  indications  to  the  right  and  up,  so 
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that  the  curve  data  must  be  "inverted"  for  correct  orientation. 

In  order  to  realize  the  full  capabilities  of  the  conversion 
equipment,  the  input  data  should  be  scaled  to  cover  the  entire  range  of 
possible  output  voltages.   Thus,  from  consideration  of  the  maximum  magni- 
tudes of  input  curve  data  and  of  the  sizes  of  graph  plots  usually  generat- 
ed, a  compromise  scale  expansion  factor  of  three  is  indicated. 

All  that  remains  to  complete  the  point  transformation  scheme  is 
to  add  to  the  inverted  and  expanded  data  the  value  of  the  reference  point 
in  the  new  co-ordinate  frame.  This  point  was  arbitrarily  chosen  at  octal 
2400,  2400  to  leave  adequate  display  area  for  graph  titling. 


17 


APPENDIX  III 
MEMORY  FORMAT  OF  GRAPH  DATA  FILE 

The  graph  plot  memory  file  contains  a  series  of  title  line  sections 
followed  by  curve  point  data. 

The  title  line  sections  are  arranged  in  packed  BCD  (i.e.,  two  BCD 
characters  per  160  word)  with  the  end  of  a  line  indicated  by  the  octal 
code  77.   The  next  title  line  begins  with  the  character  following  the  end 
code.   The  number  of  lines  in  the  entire  title,  and  the  file  location  of 
the  beginning  of  the  first  line  are  set  in  low  core  cells. 

The  curve  data  file  is  bounded  by  file  begin  and  file  end  locations 
set  into  two  low  core  cells.   Each  pair  of  CDC  160  words  contain  the 
horizontal  and  vertical  ordinates  for  digital  to  analog  conversion  and 
display. 
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APPENDIX  IV 
OPERATION  OF  THE  ANALOG  DISPLAY  PROGRAM 

A.  Fast  version 

1.  Equipment  required 

CDC  160  digital  computer 

CDC  163  magnetic  tape  unit 

Digital  to  analog  conversion  equipment 

Hewlett-Packard  122A  oscilloscope 

Hewlett-Packard  650A  oscillator 

General  Radio  1217B  pulse  generator 

2.  Blanking  scheme  shown  in  Fig.  5. 

3.  Load  the  program  in  0000-1773. 

4.  Run  the  program  from  the  address  selected  from  the  table  of 
starting  addresses.   (Fig.  3.) 

B.  Slow  version 

1.  Equipment  required 

CDC  160  digital  computer 

CDC  163  magnetic  tape  unit 

Digital  to  analog  conversion  equipment 

Analog  x-y  plotter 

2.  Blanking  scheme  shown  in  Fig.  5.   Set  plotter  switch  for  remote 
pen  control. 

3.  Load  program  in  0000  2077. 

4.  For  plotting,  master  clear  and  run.  For  tape  control,  run  from 
the  address  selected  from  the  table  of  starting  addresses.   (Fig.  3.) 
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APPENDIX  V 
PROGRAM  ROUTINE  LISTINGS 
The  routines  ?re  listed  in  the  following  order, 

1.  ZEST 

2.  ROT  (fast) 

3.  ROT  (slow) 

4 .  READ 

5.  GREAD  (fast) 

6.  GREAD  (slow) 

7.  TAP 

8.  LTR  (fast) 

9.  LTR  (slow) 

10.  GRP  (fast) 

11.  GRP  (slow) 

12.  CHARACTER  TABLE 

13.  RNC 

14.  IDA  and  DA  (delays) 

15.  LOW  CORE  LIST 
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REM 

MAIN  CONTROL;  ROUTINE 

0100 

0403 

ZEST 

LDN 

03 

ZERO  START 

0101 

6102 

28 

NZF 

UK 

TWO  START 

0102 

0401 

LDN 

01 

0103 

4024 

UX 

STD 

NOCURl 

0104 

0101 

SHA 

01: 

/ 

0105 

7040 

JPI 

READA 

0106 

0101 

uu 

SHA 

01 

0107 

7046 

JPI 

GREADA 

0110 

7045 

JPI 

ROTA 

0111 

6102 

1ST 

NZF; 

UZ 

ONE  START 

0112 

0401 

LDN 

01 

0113 

4024 

UZ 

STD 

NOCURi 

0114 

2022 

LDD 

PA 

0115 

4064 

STD 

FP 

0116 

6510 

NZB 

UU 

<  ■> 

0117 

7522 

4ST 

EXFi 

BSOEFi 

FOUR  START 

0120 

7523 

STR1: 

EXF 

STST 

0121 

7600 

INA 

0122 

0202 

LPN 

02 

0123 

6503 

NZB 

STR1 

0124 

7515 

5ST 

EXF 

BSOEFi 

FIIVE  START 

0125' 

7516 

STR2: 

EXF; 

STST 

0126 

7600 

INA 

0127 

0202 

LPN 

02 

0130 

6503 

NZB 

STR2 

*s 

0131 

7511 

3ST 

EXF 

RFOEFl 

THREE  START 

0132 

7113 

JFI 

NSTOPl 

0133 

7511 

6ST 

EXF 

RWND 

SIX  START 

0134 

7507 

STR3 

EXF 

STST 

0135 

7600 

INA 

0136 

0240 

LPN 

40 

- 

0137 

6403 

ZJB 

STR3 

■ 

0140 

7105 

JFI 

NSTOPl 

0141; 

1121 

BSOEF 

1121 

- 

0142 

1131 

RFOEF 

1131 

i" 

0143 

1141 

STST 

1141 

0144 

1161 

RWND 

1161 

0145 

0007 

NSTOP 

07 

0024 

NOCUR 

EQU 

24 

r4 


ZEST 


21 


0040 

READA 

EOU 

40 

0046 

GREADA 

EQU 

46 

0045 

ROTA 

EOU 

45 

0022 

PA 

EOU 

22 

0064 

FP 

EOU 

64 

0000 

END 

^ 


ZEST 


22 


t 

REM 

0100 

0510 

ROT 

LCN 

10 

0101 

4244 

STF 

S 

0102 

2020 

CIRCA 

LDD 

XPI 

0103 

4026 

STD 

XPA 

0104 

2021 

LDD 

YPI 

0105 

0640 

ADN 

40 

0106 

4027 

STD 

YPA 

0107 

2076 

LDD 

76 

0110 

4234 

STF 

R 

0111 

2025 

LDD 

IFTIL 

0112 

4203 

STFi 

AX 

0113. 

0101 

LTR 

SHA 

01 

0114 

7041 

JPI 

LTRA 

0115' 

0000 

AX 

0116 

0601 

ADN 

01 

0117 

4302 

STB 

AX 

0120 

2226 

LDFi 

OS 

0121 

5027 

RAD 

YPA 

0122 

5622 

AOF 

R 

0123 

6510 

NZB 

LTR 

0124 

5621 

AOF 

S 

0125' 

6523 

NZB 

CIRCA 

0126 

0540 

LCN 

40 

0127 

4216 

STFi 

S 

0130 

2075 

CIRCB 

LDD 

75 

0131 

4026 

STD 

XPA 

0132 

2074 

LDD 

74 

0133 

4027 

STD 

YPA 

0134 

0101 

SHA 

01 

0135 

7041: 

JPI 

LTRA 

0136 

0070 

70 

0137 

0101 

SHA 

01 

0140 

7042 

JPI 

QRPA 

0141 

5604 

AOF 

S 

0142 

6512 

/ 

NZB 

CIRCB 

0143 

6443 

ZJB 

ROT 

0144 

0000 

R 

0145 

0000 

S 

0146 

0200 

OS 

200 

DISPLAY  LOOP 

SET  TITLE  ITERATIONS 


SET  TITLE  LINE 
INITIAL  POINT 


DISPLAY  A  TITLE  LINE 


GET  SET  FOR  NEXT  LINE 

LOOP  TO  REPEAT  TITLE 
SET  CURVE  ITERATIONS 


DISPLAY  ORIGIN 


DISPLAY  CURVE;  DATA 

LOOP  TO  REPEAT  CURVE) 
LOOP  TO  REPEAT  CYCLE 


ROT   (FAST) 


23 


0020 

XPI 

EQU 

20 

0021 

YPI 

EQU 

21 

0025: 

IFTILi 

EQU 

25 

0026 

XPA 

EQU 

26 

0027 

YPA 

EQU 

27 

0041 

LTRA 

EQU 

41 

0042 

GRPA 

EQU 

42 

0000 

END 

ROT      (FAST) 

\ 
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• 

REM 
REM 

0100 

2020 

ROTD 

LDD 

XPI 

0101 

4026 

STD 

XPA 

0102 

2021 

.  LDD 

YPI 

0103 

0640 

ADN 

40 

0104 

4027 

STD 

YPA 

0105 

2076 

LDD 

76 

0106 

4232 

STFi 

R 

0107 

2025 

LDD 

IFTILI 

0110 

4203 

STF> 

AX 

0111 

0101 

LTR! 

SHA 

01 

0112 

7041 

JPI 

LTRA 

0113 

0000 

AX 

0114 

0601 

ADN 

01 

0115 

4302 

STB 

AX 

0116 

2223 

LDF 

OS 

0117 

5027 

RAD 

YPA 

0120 

5620 

AOF! 

R 

0121 

6510 

NZB 

LTR 

0122 

2075' 

LDD 

75 

0123 

4026 

STD 

XPA 

0124 

2074 

LDD 

74 

0125 

4027 

STD 

YPA 

0126 

0101 

SHA 

01 

0127 

7041: 

JPI 

LTRA 

0130 

0070 

70 

0131 

0101 

NXT 

SHA 

01 

0132 

7042 

JPI 

GRPA 

0133 

2022 

LDD 

PA 

0134 

4064 

STD 

FP 

0135 

0101 

SHA 

01 

0136 

7046 

JPI 

GREADA 

0137 

6506 

NZB 

NXT 

0140 

0000 

R 

0141 

0200 

OS 

200 

0020 

XPI 

EQU 

20 

0021 

YPI 

EQU 

21 

0022 

PA 

EQU 

22; 

0025 

IFTIL 

EOU 

c25! 

ROTD  DELAYED  VERSION 
DISPLAY  LOOP 

SET  TITLE  LINE 
INITIAL  POINT 


DISPLAY  A  TITLE  LINE 


GET  SET  FOR  NEXT  LINE> 


DISPLAY  ORIGIN 


DISPLAY  CURVE!  DATA 


ROT   (SLOW) 


25 


0026 

XPA 

EQU 

26 

0027 

YPA 

EQU 

27 

0041 

ITRA 

EQU 

41 

0042 

GRPA 

EQU 

42 

0046 

GREADA 

EQU 

46 

0064 

FP 

EQU 

64 

0000 

END 

/ 
/ 


ROT      (SLOW) 


26 


» 

REM 
REM 
REM 

READ4 

READS    AND    TRANSFORMS 

TITLE    AND    AXIS    DATA 

1530 

ORG 

1530 

1530 

0602 

READ 

AON 

02 

1531 

4275 

S1F 

XX 

SET    RETURN    ADDRESS 

1532 

0101 

SHA 

01 

/ 

1533 

7043 

JPI 

TAPA 

READ    NUMBER    OF 

1534 

6331 

6331 

TITLE   LINES 

1535 

0074 

74 

1536 

0100 

100 

- 

1537 

6137 

NZF; 

TERA 

1540 

2477 

LCD 

77 

1541 

4077 

STD 

77 

1542 

4076 

STD 

76 

1543 

2025 

LDD 

IFTILI 

SET    FILE    POINTERS 

1544 

4205 

STF: 

UA 

1545 

0701 

SBN 

01 

1546 

4022 

STD 

PA 

1547 

0400 

TITL! 

LDN 

1550 

4100 

ST1 

CLEAR    TITLE!  SPACE. 

1551 

0000 

UA 

1552 

5701 

AOB 

UA 

1553 

3606 

SBF> 

G 

1554 

6505 

NZB 

r-lTLI 

1555 

0101 

SHA 

01 

-v 

1556 

7043 

JPI 

TAPA 

READ    TITLE    LINE 

1557 

5331 

5331 

1560 

2600 

F> 

2600 

1561 

3000 

G 

3000 

1562 

6120 

NZF; 

TERBl 

1563 

2302 

LDB 

G 

.    "u 

1564 

0701, 

SBN 

01 

1565 

4202 

STFi 

CO 

.,                                                   ■- 

1566 

2100 

J 

LDI 

FIND    LAST    CHARACTER 

1567 

0000 

CO    ' 

IN    TITLE'  LINE' 

1570 

6003 

ZJF> 

R 

1571 

0720 

SBN 

20 

( 

1572 

6140 

NZF* 

K 

1573 

0501 

R 

LCN 

01 

READ 


27 


-r t—i — r"r-ry—rrt-r-\-T~-'f-\-r':-'~  -T  r  f.   r  ■  ■■■•■]  ,■ -T 


1574 
1575 

1376 

1577 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1640 
1641 
1642 
1643 


5305 
6507 
4067 
2200 
1540 
6104 
4067 
2200 
1563 
4206 
2067 
0204 
6004 
7704 
7101 
0000 
2067 
0220 
6003 
7720 
7011 
2067 
7777 
6501 
6402 
7101 
0000 
2347 
4357 
6562 
5743 
4203 
0477 
4100 
0000 
5701 
2022 
4062 
2063 
6302 


T6RA 

TERB 
TERR 


PEX 
NPAR 


NEOF 


RET 

XX 

TITLA 


CA 


RAB 
NZB 
STD 
LDF 

NZF 
STD 
LDF, 

STF' 

LDD 

LPN 

ZJF 

HLT 

JFI 

LDD 
LPN 
ZJF 
HLT 
JPI 
LDD 
HLT 
NZB 
ZJB 
JFI 

LDB 
STBi 
NZB, 
AOB 


CO 

J 

TT 

READ 
TERR 
TT 

READ 

PEX 

TT 

04 

NPAR> 

04 

01: 

TT 

20 

NEOFi 

20 

ZESTA 

TT 

77 

01 

02 

01 

F 

UA 

TITLl 
CO 


10 


33 


/ 


PARITY  STOPi 


STFi  CA 

LDN  77 
STI 

AOB  CA 

LDD  PA 


END  OF!  FILE:  STOP 
UNABLE  TO  PROCEED 
EXIT 


f5 


ADD  END  CODE  TO  FILE 


STD 
LDD 
NJFi 


P 

PH! 

H 


GET  SET  TO  PACK  FILE 


READ 


28 


1644 

4463 

SRD 

PH 

1645 

2365 

Hi 

LDB 

F 

1646 

0601 

ADN 

01 

1647 

4202 

STFi 

D 

1650 

2100 

E 

LDI 

1651 

0000 

D 

/ 

1652 

0277 

LPN 

77 

/ 

1653 

4067 

STD 

TT 

1654 

4463 

SRD 

PH 

1655 

6214 

PJF 

AB 

1656 

2067 

LDD 

TT 

1657 

1562 

LSI 

P 

1660 

6114 

NZF 

B 

1661 

6013 

ZJF 

B 

1662 

4067 

TERC 

STD 

TT 

1663 

2200 

LDF 

1664 

1712 

READ     162 

• 

1665 

6560 

NZB 

TERR 

1666 

5422 

RETA 

AOD 

PA 

1667 

4064 

STD 

FP 

SET  FILE  INDEX 

1670 

6543 

NZB 

RET 

QO  EXIT 

1671 

5462: 

AB 

AOD 

P 

1672 

2067 

LDD 

TT 

1673 

0111 

SHA 

11: 

1674 

4162 

B 

STI 

P 

^   PACK  BCD  FILE) 

1675 

5724 

AOB 

D 

1676 

3740 

SBB 

CA 

1677 

6527 

NZB 

E 

1700 

2062 

LDD 

P 

1701 

4022 

STD 

PA 

1702 

5477 

AOD 

77 

CHECK  FOR  TITLES 

1703 

6554 

NZB 

T1TLA 

COMPLETED 

1704 

0101 

SHA 

01: 

1705 

7043 

JPI 

TAPA 

READ  AXIS  DATA 

1706 

6331 

/ 

6331 

~ 

1707 

2600 

U 

2600 

i 

1710 

2640 

V 

2640 

1711 

6527 

NZB 

TERC' 

?   -' 

1712 

0502: 

LCN 

02    ' 

s 

1713 

4226 

STF 

CU 

READ 


29 


1714 
1715 
1716 
1717 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1740 
1741 


5215 
0502 
5211 
2310 
0601 
4202 
2500 
0000 
4067 
0102 
3067 
3022 
0640 
4076 
5701 
5704 
5605 
6447 
0411 
5314 
6516 
0000 
0022 
0025 
0043 
0062 
0063 
0064 
0067 
0011 
0000 


PAP 
X 


cu 

PA 

IFTIL 

TAPA 

P 

PH 

FP 

TT 

ZESTA 


RAF 

LCN 

RAT. 

LDB 

ADN 

STF 

LCI 

STD 

SHA. 

ADD 

ADD 

ADN 

STD 

AOB 

AOB 

AOFi 

ZJB 

LDN 

RAB 

NZB 

EOU 
EQU 
EQU 
EOU 
EQU 
EQU 
EQU 
EQU 
END 


X 

02 

PAP 

U 

01 

M 


TT 

02 

TT 

PA 

40 

76 

X 

PAP. 

CU 

RETA, 

11 

W 

z 


22 
25 
43 
62 
63 
64 
67 
11 


/ 


TRANSFORM  AXIS  DATA 


STORE  ORIGIN  LOCATION 


READ 


r' 


30 


0100 

0101 

0102 

0103 

0104 

0105 

0106 

0107 

0110 

0111 

0112 

0113 

0114 

0115 

0116 

0117 

0120 

0121: 

0122 

0123 

0124 

0125: 

0126 

0127 

0130 

0131 

0132 

0133 

0134 

0135! 

0136 

0137 

0140 

0141 

0142 

0143 


0602 
4251 
2424 
4261 
2200 
2600 
4206 
2064 
4066 
0101 
7043 
6331 
0000 
7701 
6150 
2303 
0604 
4065 
2200 
3022 
4213 
0502 
5211 
2565 
3600 
4000 
6021 
3302 
4067 
0102 
3067 
3022 
4164 
5465 
5464 
5704 


GREAD 


FIG 


OK 


FIXA 

FIX 

END 


BB 


REM 
REM 
RIM 
REM 
ADN 
STF 
LCD 
STF 
LDF 

STF 
LDD 
STD 

SHA 
JPI 


NZF 
LDB 
ADN 
STD 
LDF 

STF 
LCN 
RAF 
LCI 
SBF 

ZJF 
ADB 
STD 
SHA 
ADD 
ADD 
STI 
AOD 
AOD 
AOB 


02 
EXA 
NOCUR 
CU 

2600 

Y 

FP 

FB 

01 

TAPA 

6331 

7701: 

TER 
Y 

04 
FPA 

3022 

BB 

02 

BB 

FPA 

4000 

GAH 

END 

TT 

02 

TT 

PA 

FP 

FPA 

FP 

BB 


FAST  GREAD 

EXPAND  BY  3 

RfAQS  AND  TRANSFORMS 

CURVE  DATA 

STORE  RETURN  ADDRESS 

STORE  NO.  CURVES 

SET  FIRST  WORD  ADDRESS 

SET  FILE  BEGIN  INDEX 

GET  CURVE  DATA 
FROM  TAPE 


GET  SET  TO  TRANSFORM 
CURVE  DATA 


TEST  FOR  END  OF  DATA 


TRANSFORM  CURVE  DATA 


INDEX  FILE  POINTERS 


GREAD   (FAST) 


1>L 


0144 
0145 
0146 
0147 
0150 
0151 
0152 
0153 
0154 
0155 
0156 
0157 
0160 
0161 
0162 
0163 
0164 
0165 
0166 
0167 
0170 
0171 
0172 
0173 
0174 
0175 
0176 
0177 
0200 
0201 
0202 
0203 
0204 
0205 
0206 
0207 
0210 


0202 
6520 
6417 
2064 
4023 
7101 
0000 
2466 
3064 
5341 
6326 
3425 
6326 
5603 
6413 
6554 
0000 
0000 
4301 
0204 

6003 

7704 

6553 

2306 

0220 

6003 

7720 

7011 

2313 

7777 

6501: 

6402: 

0677 

6724 

0501: 

5024 

7016 

0022 

0023 

0024 


EXIT 


EXA 

GAH 


CURL 


CU 
ST 
TER 


CT 


CK 


TESS 


OFLO 


PA 
FE 
NOCUR 


LPN 
NZB 
ZJB 
LDD 
STD 
JFI 

LCD 
ADD 
RAB 
NJF 
SBD 
NJF 
AOF 
ZJB 
NZB 


STB 
LPN 
ZJF 
HLT 
NZB 
LDB 
LPN 
ZJF 
HLT 
JPI 
LDB 
HLT 
NZB 
ZJB 
ADN 
NJB 
LCN 
RAD 
JPI 
EOU 
EOU 
EOU 


02 

FIXA 

FIX 

FP 

FE 

01 

FB 

FP 

Y 

TESS 

IFTIL 

OFLO 

CU 

EXIT 

FIG 


ST 

04 

CT 

04 

OK 

ST 

20 

CK 

20 

ZESTA 

ST 

77 

01 

02 

77 

CURL 

01 

NOCUR 

5STA 

22 

23 

24 


EXIT 

END  OF  CURVE  DATA 


TEST  FOR  MEMORY 
OVERFLOW 


TEST  FOR  JOB  COMPLETE 


PARITY  STOP 


END  OF,  FILE  STOP 
UNABLE  TO  PROCEED 


MEMORY  OVERFLOW 


GREAD   (FAST) 


0025 

0043 

0064 

0065; 

0066 

0011 

0016 

0067 

0000 


IFT1L 

TAPA 

FP 

FPA 

FB 

ZESTA 

5STA 

TT 


EOU 
EOU 
EOU 
EOU 
EOU 
EOU 
EOU 
EQU 
END 


25 
43 
64 
65 
66 
11 
16 
67 


GREAD   (FAST) 
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0100 

0101 

0102 

0103 

0104 

0105 

0106 

0107 

0110 

0111 

0112 

0113 

0114 

0115 

0116 

0117 

0120 

0121 

0122 

0123 

0124 

0125 

0126 

0127 

0130 

0131: 

0132 

0133 

0134 

0135 

0136 

0137 

0140 

0141 

0142 


0602 
4226 
0101 
7043 
6331 
2600 
7701 
6122 
2303 
0604 
4065 
2165 
3600 
3777 
6006 
3302 
4164 
5465 
5464 
6510 
2064 
4023 
7101 
0000 
0000 
4301 
0204 
6003 
7704 
6525 
2306 
0220 
6003 
7720 
7013 


QREADX 


OK 

FIX 
END 


EXIT 


EXA 

ST 

TER 


CT 


REM 
REM 
REM 
REM 
REM 
ADN 
STF 
SHA 
JPI 


NZF 
LDB 
ADN 
STD 
LDI 
SBFi 

ZJF 
ADB 
STI 
AOO 
AOD 
NZB 
LDD 
STD 
JFI 


STB 
LPN 
ZJF 
HLT 
NZB 
LDB 
LPN 
ZJF 
HLT 
JPI 


02 

EXA 

01 

TAPA 

6331 

2600 

7701 

TERi 

Y 

04 

FPA 

FPA 

3777 

EXIT 

END 

FP 

FPA 

FP 

FIX 

FP; 

FEi 

01 


ST 

04 

CT 

04 

OK 

ST 

20 

CKi 

20 

2STA 


DELAYED  VERSION 

GREAD 

RgADS  CURVE  POINTS 

INTO  COMPUTER  MEMORY 

USE  WITH  QRPXD  ONLY 

STORE  RETURN  ADDRESS 

GET  CURVE  POINTS 


ERROR  RETURN 


STORE  CURVE.  POINTS 
IN  FILE 


RETURN 


PARITY  ERROR  STOP 


END  OF, FILE  STOP 
RUN  TO  CONTINUE 


GREAD   (SLOW) 
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0143 
0144 
0145 
0146 


2313 
7777 
6501 
6402 
0023 
0043 
0064 
0065 
0013 
0000 


CK 


FE 

TAPA, 
FP 
FPA 

2STA 


LDB 
HLT 
NZB 
ZJB 
EQU 
EQU 
EQU 
EOU 
EOU 
END 


ST 
77 
01 
02 
23 
43 
64 
65 
13 


TAPE  STATUS  TO  A 
UNABLE  TO  PROCEED 
START  OVER  FROM 
BEGINNING 


GREAD   (SLOW) 


35 


• 

REM 
REM 
REM 
REM 

0100 

0602    TAP1     ADN 

02 

0101 

4200 

STF< 

0102 

0000    RADD 

0103 

2301 

LDB 

RADD 

0104 

4202: 

STF 

02 

0105 

2100    LDARQ    LDI 

0106 

0000 

BSS 

01 

0107 

4244 

STF. 

TAPTRM 

0110 

1200 

LPF 

0111 

3177 

3177 

0112 

4273 

STF 

RDFWDi 

0113 

0207 

LPN 

07 

0114 

3200 

ADFi 

0115 

1140 

1140 

0116 

4261 

STF 

STATCD 

0117 

7560    STREQ'   EXF 

STATCD 

0120 

7600 

INA 

0121 

0202 

LPN 

02 

0122 

6503 

NZB 

STREQ 

0123 

2230 

LDF 

TAPTRM 

0124 

1200 

LPFi 

0125 

0600 

600 

0126 

6052 

ZJF 

MTERRi 

0127 

0111 

SHA 

11 

0130 

0110 

SHA 

10 

0131 

0103 

SHA 

03 

0132 

3200 

ADF 

0133 

7115 

7115 

0134 

4224 

STF 

MTINPl 

0135 

7500 

EXF' 

0136 

1171 

t 

1171 

0137 

2214 

LDF 

TAPTRM 

0140 

6303 

NJF 

03 

0141 

7500 

EXF 

0142 

1172 

1172 

0143 

5735: 

AOB 

LDARQ' 

01 


01: 


01 


01: 


01 


TAP  -  GENERAL 
CDC  163  MAGNETIC 
TAPE  UNIT  READ/WRITE 
ROUTINE 

STORE  RETURN  ADDRESS 

BUILD  EXTERNAL 
FUNCTION  CODE 


BUILD  STATUS  REQ. 


STATUS  REQUEST 


LOOP  UNTIL  READY 
BUILD  CODE  FOR 
INPUT  OR  OUTPUT 


STORE  IT 

SELECT  ODD  PARITY 

CHECK  DESIRED  PARITY 

EVEN  PARITY  DESIRED 
SELECT  EVEN  PARITY 


TAP 


0144 

4202 

STF 

GETINT 

01 

0145 

2100 

QETINT 

LDI 

GET  INITIAL  ADDRESS 

0146 

0000 

BSS 

01 

0147 

4226 

STFi 

MTEXIT 

01 

0150 

5702 

AOB 

GETINT 

01 

0151 

4202 

STF 

TAPTRM 

01 

0152 

2100 

TAPTRM 

LDI 

GET  TERMINAL  ADDR. 

0153 

0000 

BSS 

01 

0154 

4205 

STF 

MTINPi 

01: 

0155 

0503 

LCN 

03 

0156 

4310 

STB 

GETINT 

01 

0157 

7526 

RDWT 

EXF: 

RDFWD 

01: 

0160 

7215 

MTINP; 

INP 

MTEXIT 

01 

INPUT/OUTPUT  BLOCK 

0161 

0000 

BSS 

01 

0162 

7515 

EXF 

STATCD 

STATUS  REQUEST 

0163 

7600 

INA 

0164 

0274 

LPN 

74 

0165 

4211 

STF' 

BANKSW 

STORE  STATUS  RESP. 

0166 

6125 

NZFi 

TRYAGN 

ERROR  JUMP 

0167 

0401 

LDN 

01 

0170 

0601 

ERRET 

ADN 

01 

BUILD,  SET  EXIT 

0171 

3316 

ADB 

TAPTRMi 

01 

ADDRESS 

0172 

4203 

STF 

MTEXIT 

01: 

0173 

2203 

LDF 

BANKSW 

0174 

7101 

MTEXIT 

JFI 

01 

0175 

0000 

BSS 

01 

***  - 

0176 

0000 

BANKSW 

0177 

0000 

STATCD 

0200 

0602 

MTERRi 

ADN 

02 

DELAY  LOOP 

0201 

6501 

NZB 

01 

0202 

5774 

AOB 

LDARG 

01 

BUILD  ERROR  EXIT 

0203 

4306 

STB 

MTEXIT 

01 

0204 

7500 

RDFWD 

EXFi 

READ  FORWARD  OVER 

0205: 

0000 

BSS 

01 

END  OF.  FILEi 

0206 

2333 

LDB 

TAPTRM 

01 

~ 

0207 

6202 

( 

PJF' 

GOJUMP' 

— * 

0210 

7600 

INA 

• 

0211 

6515 

GOJUMP 

NZB 

MTEXIT 

UNCONDITIONAL1  ERROR 

0212 

6416 

ZJB 

MTEXIT 

JUMP  TO  EXIT 

0213 

5745 

TRYAGN 

AOB 

GETINT 

01 

TRY  3  TIMES 

TAP 
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0214  6424  ZJB  ERRET  THEN  ERROR  EXIT 

0215  2310  LDB  RDFWD    01 

0216  0207  LPN  07 

0217  3200  ADF 

0220  1120  1120 

0221  4212  STF-  TAPBKS   01 

0222  0620  ADN  20  / 

0223  4212  STF  TAPBKS   03 

0224  7511  EXF  TAPBKS   03 

0225  7600  INA 

0226  0202  LPN  02 

0227  6503  NZB  03  LOOP  UNTIL  READY 

0230  0602  ADN  02 

0231  6501  NZB:  01  DELAY  LOOP 

0232  7500    TAPBKS:  EXFi  BACKSPACE  TO 

0233  0000  BSS  01:  END  OF;  FILE 

0234  7500  EXF> 

0235  0000  BSS  01 

0236  7600  INA 

0237  0202  LPN  02 

0240  6504  NZB  04  LOOP  UNTIL  READY 

0241  6462  ZJB  RDWT  GO  TRY  AGAIN 
0000  END 


TAP 


0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 
0115 
0116 
0117 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0130 
0131 
0132 
0133 
0134 
0135 
0136 
0137 
0140 


0602 
4210 
2026 
4060 
2027 
4061 
2304 
4214 
2100 
0000 
0701 
4232 
5703 
4237 
2245 
4207 
2236 
6302 
4634 
2026 
4077 
7500 
0000 
7326 
0100 
5703 
5707 
0207 
6511 
4621 
6203 
2220 
6103 


LTR3B 
SM 


PP 


PO 

CD 
CDA 


H 


REM 

REM 

R6M 

REM 

REM 

REM 

REM 

ADN 

STFi 

LDD 

STD 

LDD 

STD 

LDB 

STF 

LDI 

SBN 

STFi 

AOB 

STF 

LDF 

STF 

LDF 

NJF 

SRF 

LDD 

STD 

EXF, 

OUT 

AOB 

AOB 

LPN 

NZB 

SRFl 

PJFi 

LDF! 

NZF' 


02 

PP 

XPA 

XP 

YPA 

YP 

SM 

PO 


01 

FWA 

PP 

EXADD! 

PUP' 

CDA 

KH 

PO 

KH 

XPA 

OB 


KK 

100 

CDA 

POi 

07 

PO 

KH 

0 

NOP 

S 


OUTPUTS  A  LINE  OF  BCD 
CHARACTERS  TO  D/A 
ARGUMENT  IS  FIRST  WORD 

ADDR.  OF  PACKED  FILE 
CHARACTER  TABLE 
MUST  BE  LOCATED  IN 
CELLS  1000-1527 

STORE  ARGUMENT  ADDR. 


SET  GRID  POINTERS 


SET  CHARAC.  INDEX 
SET  RETURN  ADDRESS 


OUTPUT  INITIAL  POINT 


LTR   (FAST) 


0141 

5604 

0 

AOF 

FWA 

0142 

2216 

LDF 

SH 

0143 

4203 

S 

STF 

SHIFT 

0144 

2100 

LDI 

0145 

0000 

FWA 

0146 

0000 

SHIFT 

0147 

0277 

LPN 

77 

0150 

0777 

SBN 

77 

0151 

6114 

NZF 

CONT 

0152 

2305 

EXIT 

LDB 

FWA 

0153 

7101 

JFI 

01 

0154 

0000 

EXADD 

0155 

0077 

KK 

77 

0156 

5252 

KH 

5252: 

0157 

0600 

NOP; 

600 

0160 

0111 

SH 

111 

0161 

1077 

TAD 

1077 

0162 

2411 

PDN 

2411 

0163 

2401 

PUP' 

2401: 

0164 

5060 

RADI 

5060 

0165 

3304 

CONT 

ADB 

TAD 

0166 

4202 

STF 

TENT 

0167 

2100 

LDI 

0170 

0000 

TENT 

0171 

4062 

STD 

CP 

0172 

2063 

LDD 

CH 

0173 

6302 

NJF' 

O 

0174- 

4463 

SRD 

CH 

0175: 

2312 

Q 

LDB 

PUP 

0176 

4256 

STF' 

C 

0177 

2313 

STO> 

LDB 

RADI 

0200 

4251 

STF 

B 

0201 

0101 

R 

SHA 

01 

0202 

7044 

JPI 

RNCA 

0203 

6056 

( 

ZJFi 

SK 

0204 

4241 

STF! 

MOV 

0205 

0775 

SBN 

75 

0206 

6025' 

ZJF! 

DOWN 

0207 

0701 

SBN 

01: 

0210 

6025: 

ZJFi 

UP 

GET  BCD  FROM  FILE 
CHECK  FOR  END 
JUMP  TO  CARRY  ON 

EXIT  WITH  FILE  INDEX 
IN  ARITHMETIC  REGISTER 


SET  TABLE  ADDRESS 


SET  MOVEMENT  TABLE 
ADDRESS         v 


SET  EXF  CODE 


STORE  MOTION  CODE 
AND  DECODE  FOR  STEPi 
SIZE,  NUMBER  OF 
STEPS,  DIRECTION 
AND  PEN  CONTROL 


LTR   (FAST) 
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0211 

0212 
0213 
0214 
0215 
0216 
0217 
0220 
0221 

0222 
0223 
0224 
0225 
0226 
0227 
0230 
0231 
0232 
0233 
0234 
0235 
0236 
0237 
0240 
0241 
0242 
0243 
0244 
0245 
0246 
0247 
0250 
0251 
0252 
0253 
0254 
0255 
0256 
0257 
0260 


0701 
6455 
0677 
0217 
4231 
2630 
4227 
2225 
0220 
6102 
0410 
4223 
2220 
0111 
6321 
2617 
4216 
6316 
2351 
6102 
2352 
4216 
2060 
4077 
7513 
7331 
0100 
6545 
0000 
0000 
0000 
2301 
5060 
4077 
7500 
0000 
7316 
0100 
5711 
6510 


NEG 


DOWN 

UP 
SCC 


MOV 

NUM 

SIZE 

A 

8 


SBN 

ZJB 

ADN 

LPN 

STF 

LCF 

STF 

LDF 

LPN 

NZF 

LDN 

STF 

LDF 

SHA 

NJF 

LCF 

STF 

NJF! 

LDB 

NZF 

LDB 

STF 

LDD 

STD 

EXF 

OUT 

NZB 


LDB 
RAD 
STD 
EXF; 

OUT 


01 

H 

77 

17 

NUM 

NUM 

NUM 

MOV 

20 

Z 

10 

SIZE 

MOV 

11 

A 

SIZE 

SIZE 

A 

PDN 

SCC' 

PUP. 

C 

XP 

OB 

C 

OBA 

100 

STO 


SIZE' 

XP 

OB 


/ 


60  EXECUTE 


GO  EXECUTE 

SET  FOR  PEN  DOWN 

SET  FOR  PEN  UP 


EXECUTE  PEN  CONTROLi 


OBA 
100 

AOB   NUM 

NZB   A 


OUTPUT  A  STEP' 


LTR   (FAST) 
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0261  5710  SK       AOB  B 

0262  5706  AOB  C                RESET  FOR  VERTICAL 

0263  0207  LPN  07               MOTION 

0264  0703  SBN  03 

0265  6564  NZB  R    • 

0266  0502  LCN  02               RESET  FOR  HORIZ. 

0267  5316  RAB  B                MOTION 

0270  0502  LCN  02: 

0271  5315  RAB  C 

0272  6571  NZB  R 

0273  0077  OBA  77 
0077  08       EQU  77 

0026  XPA  EQU  26 

0027  YPA  EQU  27 
0044  RNCA     EQU  44 

0060  XP  EQU  60 

0061  YP  EQU  61 

0062  CP  EQU  62 

0063  CH  EQU  63 
0000  END 


LTR   (FAST) 

« 


42 


0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 
0115 
0116 
0117 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0130 
0131 
0132 
0133 
0134 
0135 
0136 
0137 


0602 

4210 

2026 

4060 

2027 

4061 

2304 

4214 

2100 

0000 

0701 

4235 

5703 

4242 

2250 

4207 

2241 

6302 

4637 

2026 

4077 

7500 

0000 

7331 

0100 

5703 

5707 

0207 

6511 

0101: 

7050 

0300 


LTR3D 
SM 


PP 


PO 

CD 

CDA 


REM 
REM 
Rih 
REM 
REM 
REM 
REM 
REM 
AON 
STF 
LDD 
STD 
LDD 
STD 
LDB 
STF 
LDI 

SBN 
STF 
AOB 
STF 
LDF 
STF 
LDF 
NJF 
SRF 
LDD 
STD 
EXF, 

OUT 

AOB 
AOB 
LPN 
NZB 
SHA 
JPI 


02 

PP 

XPA 

XP 

YPA 

YP 

SM 

PO 


01 

FWA 

PP 

EXADDi 

PUP 

CDA 

KH 

PO 

KH 

XPA 

OB 


KK 

100 

CDA 

PO 

07 

PO 

01 

LDA 

300 


DELAYED  VERSION 
OUTPUTS  A  LINE  OF  BCD 
0HA*AeT6R8  ?8  B/A 
ARGUMENT  IS  FIRST  WORD 
ADDR.  OF  PACKED  FILE 
CHARACTER  TABLE 
MUST  BE  LOCATED  IN 
CELLS  1000-1527 

STORE  ARGUMENT  ADDR. 


SET  GRID  POINTERS 


SET  CHARAC. INDEX 
SET  RETURN  ADDRESS 


OUTPUT  INITIAL  POINT 


DELAY 


LTR   (SLOW) 


<v, 
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0140 
0141 
0142 
0143 
0144 
0145 
0146 
0147 
0150 
0151 
0152 
0153 
0154 
0155 
0156 
0157 
0160 
0161 
0162 
0163 
0164 
0165 
0166 
0167 
0170 
0171 
0172 
0173 
0174 
0175 
0176 
0177 
0200 
0201 
0202 
0203 
0204 
0205 
0206 
0207 


4621 
6203 
2220 
6103 
5604 
2216 
4203 
2100 
0000 
0000 
0277 
0777 
6114 
2305 
7101 
0000 
0077 
5252 
0600 
0111 
1077 
2411 
2401 
5060 
3304 
4202 
2100 
0000 
4062 
2063 
6302 
4463 
2312 
4261 
2313 
4254 
0101 
7044 
6064 
4244 


FWA 
SHIFT 


EXIT 

EXAOD 

KK 

KH 

NOP 

SH 

TAD 

PDN 

PUP 

RADI 

CONT 


TENT 


Q 

STO 

R 


SRF 
PJF 
LDF 
NZF 
AOF 
LDF 
STF 
LDI 


LPN 
SBN 
NZF 
LDB 
JFI 


ADB 
STF 
LDI 

STD 
LDD 
NJF 
SRD 
LDB 
STF 
LDB 
STF 
SHA 
JPI 
ZJF 
STF 


KH 

0 

NOP 

S 

FWA 

SH 

SHIFT 


77 
77 

CONT 

FWA 

01 

77 

5252 

600 

111 

1077 

2411 

2401 

5060 

TAD 

TENT 


CP 

CH 

0 

CH 

PUP 

C 

RADI 

B 

01 

RNCA 

SK 

MOV 


/ 


GET  BCD  FROM  FILE 
CHECK  FOR  END 
JUMP  TO  CARRY  ON 

EXIT  WITH  FILE  INDEX 
IN  ARITHMETIC  REGISTER 


SET  TABLE  ADDRESS 


SET  MOVEMENT  TABLE 
ADDRESS 


SET  EXF  CODE 


STORE  MOTION  CODE 


LTR   (SLOW) 


^ 
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0210  0775  SBN  75               AND  DECODE  FOR  STEP 

0211  6025  ZJF  DOWN             SIZE*  NUMBER  OF 

0212  0701  SBN  01                STEPS,  DIRECTION  AND 

0213  6025  ZJF  UP               PEN  CONTROL 

0214  0701  SBN  01 

0215  6455  ZJB  H 

0216  0677  ADN  77                           / 

0217  0217  LPN  17 

0220  4234  STF  NUM 

0221  2633  LCF  NUM 

0222  4232  STF  NUM 

0223  2230  LDF  MOV 

0224  0220  LPN  20 

0225  6102  NZF  Z 

0226  0410  LDN  10 

0227  4226  Z  STF  SIZE' 

0230  2223  LDF  MOV 

0231  0111  SHA  11 

0232  6324  NJF  A                GO  EXECUTE 

0233  2622  NEG  LCF  SIZE 

0234  4221  STF  SIZE 

0235  6321  NJF  A                GO  EXECUTE 

0236  2351  DOWN     LDB  PDN              SET  FOR  PEN  DOWN 

0237  6102  NZF  SCC 

0240  2352  UP  LDB  PUP          „    SET  FOR  PEN  UP 

0241  4221  SCC  STF  C 

0242  2060  LDD  XP 

0243  4077  STD  OB 

0244  7516  EXF  C 

0245  7337  ^  OUT  OBA              EXECUTE  PEN  CONTROL 

0246  0100  100 

0247  0101  SHA  01 

0250  7050  JPI  LDA              DELAY 

0251  0007  07 

0252  6450  ZJB  STO 

0253  0000  MOV 

0254  0000  NUM 

0255  0000  SIZE                                        , 

0256  2301  A  LDB  SIZE 

0257  5060  B  RAD  XP 


LTR   (SLOW) 


^ 
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0260 
0261 
0262 
0263 
0264 
0265 
0266 
0267 
0270 
0271 
0272 
0273 
0274 
0275 
0276 
0277 
0300 
0301 
0302 
0303 
0304 


4077 
7500 
0000 
7321 
0100 
0101 
7050 
0007 
5714 
6513 
5713 
5711 
0207 
0703 
6572 
0502 
5321 
0502 
5320 
6577 
0077 
0077 
0026 
0027 
0044 
0047 
0050 
0060 
0061 
0062 
0063 
0000 


SK 


OBA 

OB 

XPA 

YPA 

RNCA 

DA 

LDA 

XP 

YP 

CP 

CH 


STD 
EXF 

OUT 

SHA 
JPI 

AOB 
NZB 
AOB 
AOB 
LPN 
SBN 
NZB 
LCN 
RAB 
LCN 
RAB 
NZB 

EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
END 


OB 


OBA 

100 

01 

LDA 

07 

NUM 

A 

B 

C 

07 

03 

R 

02 

B 

02 

C 

R 

77 

77 

26 

27 

44 

47 

50 

60 

61 

62 

63 


OUTPUT  A  STEP 


DELAY 


RESET  FOR  VERTICAL 
MOTION 


RESET  FOR  HORIZ. 
MOTION 


LTR   (SLOW) 
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0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 


0602 
4213 
4463 
6204 
2162 
6105 
6004 
5462 
2162 
0111 
0277 
7101 
0000 
0062 
0063 
0000 


RNd 


A 

CP 

CH 


REM 

REM 

REM 

REM 

ADN 

02 

STF> 

A 

SRD 

CH 

PJF 

B 

LDI 

CP 

NZF 

C 

ZJF 

C 

AOD 

CP 

LDI 

CP 

SHA 

11 

LPN 

77 

JFI 

01 

EOU 

62 

EQU 

63 

END 

READ  NEXT  WORD  FROM 
FILE  OF  TWO  WORDS  PER 
160  WORD. 
EG  PACKED  BCD 


RNC 
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0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 
0115 
0116 


0602 
4202 
2100 
0000 
4067 
2467 
4067 
5704 
4206 
0101 
7047 
5467 
6503 
7101 
0000 
0067 
0047 
0000 


INN 


EXH> 

TT 

DA 


REM 
ADN 
STF. 
LDI 

STD 
LCD 
STD 
AOB 
STF 
SHA 
JPI 
AOD 
NZB 
JFI 

EOU 
EOU 
END 


02 
A 


TT 

TT 

TT 

A 

EXH 

01 

DA 

TT 

INN 

01 

67 
47 


LONG   DELAY 


/ 


0100 

0101: 

0102; 

0103 

0104 

0105 

0106 

0107 


0602 
4205 
2605 
0601 
6501 
7101 
0000 
1000 
0000 


SHORT 


EXHi 
DE 


REM 
ADN 
STF 
LCF 
ADN 
NZB 
JFI 


END 


02 

EXH 

DEi 

01 

01 

01 


1000 


SHORT    DELAY 


DELAY    ROUTINES 
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0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 
0115 
0116 
0117 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0130 
0131 


0602 
4226 
2022 
4064 
2224 
4204 
2164 
4077 
7500 
0000 
7317 
0100 
5464 
3423 
6010 
2306 
0611 
4310 
0207 
0703 
6516 
6421 
7101 
0000 
2401 
0077 
0077 
0022 
0023 
0064 
0000 


GRP3B 


N 

G 

B 

K 

OB 

FI 

FE 

FP 


REM 

REM 

REM 

REM 

ADN 

02 

STF 

G 

LDD 

FI 

STD 

FP 

LDF 

B 

STF 

C 

LDI 

FP 

STD 

OB 

EXF 

OUT 

K 

100 

AOD 

FP 

SBD 

FE 

ZJF 

N 

LDB 

C 

ADN 

11 

STB 

c 

LPN 

07 

SBN 

03 

NZB 

J 

ZJB 

M 

JFI 

01 

2401 

77 

EOU 

77 

EQU 

22 

EQU 

23 

EOU 

64 

END 

OUTPUTS  POINT  FILE 
TO  D/A  ONE  TIME  ONLY 
X  POINT  PiN  UP 
Y  POINT  PEN  DOWN 

STORE  RETURN  ADDRESS 

INITIALIZE  FILE  POINTER 

INITIALIZE  EXF  CODE. 

SET  OUTPUT  BUFFER 

OUTPUT  D/A 

INDEX  FILE  POINTER 
CHECK  FOR  GRAPH  END 
GO  EXIT  IF  END 

RESET  EXF  CODE 


CYCLE  BACK  FOR  Y  MOVE 

CYCLE  BACK  FOR  X  MOVE 

EXIT 

EXIT  ADDRESS 

EXF  CODE 

OUTPUT  BUFFER 


GRP   (FAST) 


49 


0100 
0101 
0102 
0103 
0104 
0105 
0106 
0107 
0110 
0111 
0112 
0113 
0114 
0115 
0116 
0117 
0120 
0121 
0122 
0123 
0124 
0125 
0126 
0127 
0130 
0131 
0132 
0133 
0134 
0135 
0136 
0137 
0140 
0141 
0142 
0143 
0144 


0602 
4254 
2022 
4064 
2164 
4072 
2472 
4060 
0102 
3020 
5060 
7500 
2401 
7341 
0061 
5464 
2164 
4073 
2473 
4061 
0102 
3021 
5061 
7517 
7327 
0062 
0101 
7050 
0300 
7500 
2411 
7317 
0061 
0101 
7050 
0010 
6021 


6RPXD 


REM 
REM 
RIM 
ADN 
STF 
LDD 
STD 
LDI 
STD 
LCD 
STD 
SHA 
ADD 
RAD 
EXF 

OUT 

AOD 
LDI 
STD 
LCD 
STD 
SHA 
ADD 
RAD 
EXF 
OUT 

UHA 
JPI 

EXF 

OUT 

SHA 
JPI 

ZJF- 


02 

EXH 

FI 

FPi 

FP 

A 

A 

XP 

02 

XI 

XP 

2401 
XA 

XP 

FP 

FP 

B 

B 

YP 

02 

Y.I 

YP 

YUC 

YA 

YP 

01 

LDA 

300 

2411 

XA 

XP 

01 

LDA 

10 

BETA 


DELAYED  VERSION 
POINT  DISPLAY  WITH 
LIN1AR  INTERPOLATION 

STORE  RETURN  ADDR. 

INITIALIZE  FILE 
POINTER 


OUTPUT  INITIAL 
X-ORDINATE 


01 


01 


OUTPUT  INITIAL 
Y-ORDINATE 


DELAY 
LOWER  PEN 


01 


DELAY 


CONTINUE; 


GRP   (SLOW) 
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0145 

7500 

EXIT 

EXF 

RAISE  PEN  PRIOR 

0146 

2402 

YUC 

2402 

TO  EXIT 

0147 

7310 

OUT 

YA 

0150 

0062 

YP       01 

0151 

0101 

SHA 

01 

0152 

7050 

JP1 

LDA 

DELAY 

0153 

0010 

10 

/ 

0154 

7101 

JFI 

01 

RETURN 

/ 

0155 

0000 

EXH 

0156 

0060 

XA 

XP 

0157 

0061 

YA 

YP 

0160 

2164 

ALFA 

LDI 

FP 

0161 

4072 

STD 

A 

0162 

5464 

AOD 

FP 

0163 

2164 

LD 

FP 

0164 

4073 

STD 

B 

0165 

5464 

BETA 

AOD 

FP 

0166 

3423 

SBD 

FE 

TEST  FOR 

END 

0167 

6422 

ZJB 

EXIT 

0170 

2164 

LDI 

FP 

0171 

3472 

SBD 

A 

0172 

4072 

STD 

A 

DELTA  X 

0173 

6303 

NJF 

ANEG 

0174 

0401 

LDN 

01 

SET  CODE 

FOR  +X 

0175 

6104 

NZF 

STIC 

MOTION 

0176 

2472 

ANEG 

LCD 

A 

0177 

4072 

STD 

A 

0200 

0402 

LDN 

02 

SET  CODE 

FOR  -X 

0201 

4230 

STIC 

STF 

ICODE 

MOTION 

0202 

5464 

AOD 

FP 

1 

0203 

2164 

LDI 

FP 

0204 

3473 

SBD 

B 

0205 

4073 

STD 

B 

DELTA  B 

0206 

6303 

NJF 

BNEG' 

0207 

0404 

LDN 

04 

SET  CODE 

FOR  *Y 

0210 

6104 

NZF 

STJC' 

MOTION 

0211 

2473 

BNEG 

LCD 

B 

0212 

4073 

STD 

B 

0213 

0410 

LDN 

10 

SET  CODE 

FOR  -Y 

0214 

4216 

STJC 

STF' 

JCODEI 

MOTION 

GRP       (SLOW) 


0215 

3214 

ADF 

ICODE 

0216 

4215 

STF 

IBOTH; 

0217 

2672 

WPP 

A 

0220 

3473 

SBD 

B 

0221 

6221 

PJF 

AMBP 

0222 

2073 

AMBN 

LDD 

B 

DELTA    Y    IS    LONGEST 

0223 

4212 

STF 

NLONG 

/ 

0224 

2072 

LDD 

A 

0225' 

4211 

STF 

NSHORT 

0226 

2204 

LDF 

JCODE 

0227 

4205 

STF 

MOSTLY 

v 

0230 

6122 

NZF 

CONT 

0231 

0000 

ICODE. 

0232 

0000 

JCODE 

0233 

0000 

IBOTH 

0234 

0000 

MOSTLY 

0235 

0000 

NLONG 

i 

0236 

0000 

NSHORT 

0237 

0000 

NSWITC. 

v 

0240 

0000 

MOVE 

0241 

6561 

ALFA1: 

NZB 

ALFA 

0242 

0003 

SIZE 

03 

0243 

0000 

LIMIT 

0244 

2072 

AMBP 

LDD 

A 

DELTA    X    IS    LONGEST 

0245 

4310 

STB 

NLONG 

0246 

2073 

LDD 

B 

"■■ 

0247 

4311 

STB 

NSHORT 

0250 

2317 

LDB 

ICODEi 

0251 

4315 

STB 

MOSTLY 

0252 

2314 

CONT 

LDB 

NSHORT 

SET    UP    BEST    PATH 

0253 

4314 

STB 

NSWITC' 

PARAMETERS 

0254 

2717 

LCB 

NLONG 

0255 

4312 

STB 

LIMIT 

0256 

2072 

LDD 

A 

0257 

6103 

NZF 

TEST 

SKIP    OUTPUT    IF 

0260 

2073 

f 

LDD 

B 

DELTArX    AND:  DELTA-Y 

0261 

6054 

ZJF 

SKP 

BOTH    ZERO 

0262 

2325 

TEST 

LDB 

NLONG: 

TEST    FOR    MOTION 

0263 

3724 

SBB 

NSWITC^ 

0264 

3725 

SBB 

NSWITC 

GRP       (SLOW) 
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0265 
0266 
0267 
0270 
0271 
0272 
0273 
0274 
0275 
0276 
0277 
0300 
0301 
0302 
0303 
0304 
0305 
0306 
0307 
0310 
0311 
0312 
0313 
0314 
0315 
0316 
0317 
0320 
0321 
0322 
0323 
0324 
0325 
0326 
0327 
0330 
0331 
0332 
0333 
0334 


6305 
2330 
5330 
2334 

6105 
2334 
3736 
5335 
2342 
4336 
0203 
6007 
0201 
6103 
2341 
6102 
2743 
5060 
7500 
2411 
7327 
0061 
2353 
0214 
6007 
0204 
6103 
2356 
6102 
2760 
5061 
7500 
2412 
7313 
0062 
0101 
7050 
0001 
5770 
6552 


ZIG 


ZA6 


XLFT 

XRT 

OA 

XOUT 


YDN 

YUP 

QB 

YOUT 


NJF 
LDB 
RAB 
LDB 
NZF 
LDB 
SBB 
RAB 
LDB 
STB 
LPN 
ZJF 
LPN 
NZF 
LDB 
NZF 
LCB 
RAD 
EXFi 

OUT 

LDB 
LPN 
ZJF 
LPN 
NZF 
LDB 
NZF 
LCB 
RAD 
EXF 

OUT 

SHA 
JPI 

AOB 
NZB 


ZAG 

NSHORT 

NSWITC 

MOSTLY 

G 

NSHORT 

NLONG- 

NSWITCi 

IBOTH* 

MOVE 

03 

XOUT 

01 

XRT 

SIZE 

QA 

SIZE; 

XP 

2411 

X 

XP 

MOVE 

14 

YOUT 

04 

YUP 

SIZE 

QB 

SIZE 

YP 

2412 

Y 

YP 

01 

LDA 

01 

LIMIT 

TEST 


RESET  FOR  NEXT  TEST 


RESET  FOR  NEXT  TEST 


DECODE  X  MOTION 


OUTPUT  X  MOTION 


01 


DECODE  Y  MOTION 


OUTPUT  Y  MOTION 


01 


DELAY 

TEST  TO  CONTINUE 
INTERPOLATION  LOOP 


GRP   (SLOW) 


0335 

0501 

SKP 

LCN 

01 

0336 

5064 

RAD 

FP 

0337 

6976 

NZB 

ALFA1 

0340 

0060 

X 

XP 

0341 

0061 

Y 

YP 

0020 

XI 

EQU 

20 

0021 

YI 

EOU 

21 

0022 

FI 

EQU 

22 

0023 

FE 

EOU 

23 

0047 

DA 

EOU 

47 

0050 

LDA 

EOU 

50 

0060 

XP 

EQU 

60 

0061 

YP 

EQU 

61 

0064 

FP 

EQU 

64 

0072 

A 

EQU 

72 

0073 

B 

EQU 

73 

0000 

END 

QO    TO    NSXT    POINT 


GRP       (SLOW) 
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1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1030 
1031 
1032 
1033 
1034 
1035 
1036 
1037 
1040 
1041 
1042 
1043 
1044 
1045 
1046 


1000 
1077 
1100 
1105 
1113 
1121 
1130 
1135 
1143 
1150 
1156 
1163 
1171 
1176 
1077 
1077 
1077 
1077 
1205 
1215 
1225 
1233 
1241 
1253 
1263 
1273 
1302 
1077 
1312 
1316 
1077 
1077 
1077 
1323 
1327 
1333 
1344 
1351 
1357 
1363 


ORG 


1000 
1077 
1100 
1105 
1113 
1121 
1130 
1135 
1143 
1150 
1156 
1163 
1171 
1176 
1077 
1077 
1077 
1077 
1205 
1215 
1225 
1233 
1241 
1253 
1263 
1273 
1302 
1077 
1312 
1316 
1077 
1077 
1077 
1323 
1327 
1333 
1344 
1351 
1357 
1363 


SPACE 

ONE 

TWO 

THREE 

FOUR 

FIVE 

SIX 

SEVEN 

EIGHT 

NINE 

ZERO 

EQUAL 

NOT  EQUAL 

SPACE 

SPACE 

SPACE 

SPACE 

SLASH 

S 

T 

U 

V 

w 

X 

Y 

Z 

SPACE 

COMMA 

OPEN 

SPACE 

SPACE 

SPACE 

MINUS 

J 

Ki 

Li 

Mi 

Ni 

Oi 


CHARACTER  TABLE 
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1047 
1050 
1091 
1052 

1053 

1054 

1055' 

1056 

1057 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1100 

1101 

1102 

1103 

1104 

1105 

1106 

1107 

1110 

1111 

1112 

1113 

1114 

1115 

1116 


1367 
1374 
1403 
1323 
1411 
1374 
1077 
1077 
1077 
1421 
1427 
1435 
1444 
1451 
1457 
1466 
1474 
1502 
1510 
1077 
1516 
1522 
1077 
1077 
1077 
2477 
7506 
0  0  43 
1076 
2464 
7700 
2375 
4604 
0604 
4676 
2564 
7700 
7506 
0444 
0004 


1367 
1374 

1403 
1323 

1411 

1374 

1077 

1077 

1077 

1421 

1427 

1435 

1444 

1451 

1457 

1466 

1474 

1502 

1510 

1077 

1516 

1522 

1077 

1077 

1077 

2477 

7506 

43 

1076 

2464 

7700 

2375 

4604 

604 

4676 

2564 

7700 

7506 

444 

04- 


Pi 

Q 

Ri 

MINUS 

DOLLAR 

STAR 

SPACE 

SPACE 

SPACE: 

PLUS 

A 

B! 

CI 

D 

El 

fi 

Q< 

Hi 

I 

SPACE 

PERIOD 

CLOSE 

SPACE 

SPACE 

SPACE 

SPACE 

ONE 


SIGN 


TWO 


THREE 


CHARACTER  TABLE 
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1117 
1120 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1150 
1151 
1152 
1153 
1154 

1155 
1156 
1157 
1160 
1161 
1162 
1163 
1164 
1165 
1166 


0446 
7625 
6477 
2375 
0010 
7663 
7500 
4410 
7622 
6277 
7506 
0446 
0406 
7622 
6477 
0024 
7500 
5006 
0446 
7625 
6277 
2375 
0010 
4676 
2564 
7700 
7506 
0446 
0406 
4446 
4476 
2577 
7506 
1046 
4406 
7622 
6277 
7510 
1050 
5004 


446 

7625 

6477 

2375 

10 

7663 

7500 

4410 

7622 

6277 

7506 

446 

406 

7622 

6477 

24 

7500 

5006 

446 

7625 

6277 

2375 

10 

4676 

2564 

7700 

7506 

446 

406 

4446 

4476 

2577 

7506 

1046 

4406 

7622 

6277 

7510 

1050 

5004 


FOUR 


FilVE 


SIX 


SEVEN 


EIGHT 


NINE 


ZERO 


CHARACTER  TABLE. 
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1167 
1170 
1171 
1172 

1173 
1174 
1175 
1176 
1177 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
1207 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1230 
1231 
1232 
1233 
1234 
1235 
1236 


1076 
2464 
7700 
0021 

7506 
2146 
7626 
6277 
0021 
7506 
2146 
0003 
2100 
4676 
2477 
0061 
7500 
0302 
0302 
0302 
0376 
2265 
7700 
0001 
7500 
4106 
0446 
0406 
4176 
2247 
7700 
2275 
0010 
6200 
1076 
2264 
7700 
0024 
7500 
5006 


1076 
2464 
7700 
21 

7506 

2146 

7626 

6277 

21 

7506 

2146 

03 

2100 

4676 

2477 

61 

7500 

302 

302: 

302 

376 

2265' 

7700 

01 

7500 

4106' 

446 

406 

4176 

2247 

7700 

2275 

10 

6200 

1076 

2264 

7700 

24 

7500 

5006 


EQUAL 


NOT  EQUAL 


SLASH 


U 


CHARACTER  TABLE 
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1237 

1240 

1241 

1242 

1243 

1244 

1245' 

1246 

1247 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1260 

1261 

1262 

1263 

1264 

1265 

1266 

1267 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1300 

1301 

1302: 

1303 

1304 

1305 

1306 


1076 
2264 
7700 
0010 
7500 
4202 
4202 
4402 
0402 
0202 
0276 
2264 
7700 
0024 
7500 
5003 
2400 
5003 
1076 
2264 
7700 
7500 
0403 
2200 
5000 
2203 
0476 
2264 
7700 
7506 
1076 
6375 
0044 
0676 
2262 
7700 
2375 
4602 
0202 
0202 


1076 

2264 

7700 

10 

7500 

4202: 

4202 

4402 

402 

202 

276 

2264 

7700 

24 

7500 

5003 

2400 

5003 

1076 

2264 

7700 

7500 

403 

2200 

5000 

2203 

476 

2264 

7700 

7506 

1076- 

6375 

44 

676 

2262: 

7700 

2375: 

4602 

202 

202; 


CHARACTER  TABLE' 


1307 
1310 
1311 

1312 
1313 
1314 
1315 
1316 
1317 
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0343 
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NOCUR 

IFTIL 
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11 
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NORM.  START  3  CURVE 
DISPLAY 

DISPLAY  NEXT  N 
CURVES,  N  IN  A 
DISPLAY  NUMBER  OF 
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STARTING  AT  CURVE  1 
ADVANCE  MAG  TAPE 
TO  NEXT  GRAPH 
BACK  MAG  TAPE.  TO 
PREVIOUS  GRAPH 
BACK  MAG  TAPE  TO 
PRESENT  GRAPH 
REWIND  MAG  TAPE 
TO  LOAD   POINT 


ENTRY  ADDRESSES  FOR 
STARTING  ROUTINE 


GRAPH  REFERENCE 

POSITION,  X  AND 

Y  ORDINATES 

BEGIN.  OF  GRAPH 

POINT  FILE 

END  OF  GRAPH 

POINT  FILE 

NO. OF  CURVES  DISPLAY 

BEGIN.  OF  TITLE  FILE 

TITLE  LINE  REFERENCE 

X  AND  Y  ORDINATES 

LINK  ADDRESSES  FOR 

SUBROUTINES 
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name  task 

ZEST      Accepts  and  sequences  the  starting  arguments  set  by  the  operator, 

ROT       Controls  the  display  sequence. 

READ      Reads,  transforms,  and  stores  title  and  origin  data  from  the 
magnetic  tape  unit.   (Fixed  location). 

GREAD     Reads,  transforms,  and  stores  graph  point  data  from  the  magnetic 
tape  unit. 

TAP       A  general  purpose  read/write  routine  for  the  CDC  163  magnetic 
tape  unit. 

LTR       Outputs  one  line  of  BCD  characters  in  a  form  appropriate  for 
conversion  by  the  D/A  conversion  equipment. 

RNC       Reads  six  bit  characters  into  the  arithmetic  register  from  the 
computer  memory. 

CHARAC   Contains  the  movement  codes  for  the  generation  of  letters  and 
TABLE     symbols  (fixed  location). 

GRP       Outputs  the  graph  point  file  to  the  D/A  conversion  equipment. 

DA       Delays  computer  action  for  approximately  6.5  milliseconds 
(unit  delay) . 

LDA       Delays  computer  action  for  N  unit  delays,  where  N  is  an  entry 
argument  to  the  routine. 

Figure  2.   Tasks  assigned  to  program  routines. 
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Starting  Function 

Address 

0000  Normal  start  for  graph  plot  display. 
One  curve  and  the  scale  grid  is  shown. 

0001  Normal  start  for  display  of  subsequent  curves  on  a 
multiple  curve  graph. 

0002  Normal  start  for  display  of  a  given  number  of  curves 

from  the  beginning  of  a  graph.   The  number  of  curves  desired 
must  be  entered  in  the  arithmetic  register. 

0003  Advances  the  magnetic  tape  to  the  beginning  of  the  next  graph 
plot.   Halt  in  0007. 

0004  Backspaces  the  magnetic  tape  to  the  beginning  of  the  previous 
graph  plot.   Halt  in  0007. 

0005  Backspaces  the  magnetic  tape  to  the  beginning  of  the  present 
graph  plot,   Halt  in  0007. 

0006  Rewinds  the  magnetic  tape  to  the  load  point.   Halt  in  0007. 
0010      Same  as  0002  start. 


Figure  3,   Starting  addresses  for  the  display  program. 
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Voltage-Bit  Pattern  Comparison  on  Scope  Face 
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Figure  4.   Digital  to  analog  conversion  table  and  scope  face 

diagram 
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Figure  5.   Scope  blanking  and  plotter  pen-lifting  scheme 
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